let () = 
  for i = 0 to 10000000 do
    ()
  done